%Wypisuje korelacje miedzy Publikacjami i Patentami

pub = PUB(:,2);
pat = [0;0;0;PAT(:,2)];

disp('Korelacja pomiedzy liczba publikacji opozniona o n lat a liczba patentow');
for i = 3:8
    [kor p] = KorelacjaPrzes(pub, pat, i);
    disp(['Opoznienie ' num2str(i) ': ' num2str(kor) ', t-Student alfa = ' num2str(p)]);
end
disp(sprintf('\n\n'));

clear pub pat i kor p;